home *** CD-ROM | disk | FTP | other *** search
/ Night Owl 6 / Night Owl's Shareware - PDSI-006 - Night Owl Corp (1990).iso / 026a / xtab.zip / DEMO.PRG < prev    next >
Text File  |  1991-06-24  |  827b  |  48 lines
  1. SET SAFETY OFF
  2. SET TALK OFF
  3. SELECT A
  4. USE CROSSTAB
  5. CT_TITLE='Totaling Records Only'
  6. CT_DOWN='AREA'
  7. DO CROSSTAB
  8.  
  9. CT_TITLE='Totaling a Field'
  10. CT_COUNT='SALES'
  11. CT_DOWN='AREA'
  12. CT_DEC=2
  13. DO CROSSTAB
  14.  
  15. CT_TITLE='Totaling a Field and 2 way XTAB'
  16. CT_COUNT='SALES'
  17. CT_DOWN='AREA'
  18. CT_ACROSS='CLASS'
  19. DO CROSSTAB
  20.  
  21. CT_TITLE='Totaling Records at 30min each and 2 way XTAB'
  22. CT_COUNT='30'
  23. CT_DOWN='AREA'
  24. CT_ACROSS='CLASS'
  25. CT_DEC=2
  26. DO CROSSTAB
  27.  
  28. CT_TITLE='Totaling a Field with CODES expanded'
  29. SELECT B
  30. * This contains the name of CLASS Codes
  31. USE NAMES
  32. INDEX ON CLASS TO TEMPB
  33.  
  34. SELECT A
  35. SET RELATION TO CLASS INTO NAMES
  36. CT_COUNT='SALES'
  37. CT_DOWN='AREA'
  38. CT_ACROSS='B->NAME'
  39. DO CROSSTAB
  40.  
  41. CT_COUNT='SALES'
  42. CT_DOWN='SALESMAN'
  43. CT_ACROSS='B->NAME'
  44. CT_BY='AREA'
  45. CT_DEC=2
  46. CT_TITLE='3way Crosstab'
  47. DO CROSSTAB
  48.